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Catalog Number 320002A 


IDENTIFICATION: 


SEL 810A/B 1/0 Handler for Card Reader 


AUTHOR: 

ACCEPTED: 

PURPOSE: 

COMPUTER 

CONFIGURATION: 


Systems Engineering Laboratories 
January 1, 1968 

To provide a free-standing 1/0 handler to communicate 
with the card reader 

SEL 810A/B Computer with Card Reader 


SUBROUTINES 

REQUIRED: 


STORAGE: 

TIMING: 


USE: 


CALLING 

SEQUENCE: 


UN$PAK, BCDT0A and common locations (Catalog 
Number 300020A) 

I13 S 

N/A 

1/0 handler tape is loaded after user's program. 


To input from the card reader the calling sequence is: 

CALL CARD$I 

DAC BUF 

F0RM 1, 15 

FDAT X, Y 

where BUF - address of first location of the buffer 

X - number of characters per word (0 for 1 char/ 
word, 1 for 2 chars/word) 

Y - number of words in the buffer 
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METHOD: 

1. 0 Input: 


1/0 handler name is CARD$I: 

Cards are read in binary mode whether the card reader has a 
BCD mode or not. Thus, a 12 punch causes bit 4 to be set in the 
computer, while a 9 punch causes bit 15 to be set. The resulting 
card binary code is first translated to BCD and then to full ASCII. 
The ASCII character is stored in the user's buffer. The approxi¬ 
mate 2 milliseconds delay between columns is used to do the trans¬ 
lation (and packing in the case of 2 characters per word) for the 
previous column. No more than 80 characters can be input. If 
more than 80 characters are requested, inputting will stop at 80. 
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000? 00000 00000000 * JANUARY 2 , 1968 

qqq s _ ooooo _Qo poonpri < _ 

0004 00000 00000000 * 1/0 handler fur car 

0006 00000 00000000 REL 


0008 00000 00000000 CRD I **• #* 


0010 00002 03100112 

001? 0000* 5*5100000 

0014 00006 01077660" 

_ QO l 8 ?_ 00 QQ 7 565 QO n on 

00i6 OOOlO 00000033 

0018 00012 51500000 


STA ADDR 


CALL UNtPAK 

STA _CLfiJU_ 

LAA s-80 

CHA _ ^NGhiC 

R RU **2 
STA TNGWC 


0020 00014 00004000 


DATA ’4000 


0022 00016 00000023 SAN 

-0023—00017. 111Q0Q34_ RRU _2U*£_ 

0024 00020 12100042 TwP S P B lN p T 


0026 00022 0330011? 

.0021 00023-42100042- 

0028 00024 02300112 


STA# ADOR 

S PB _LN-P.T-- 

lba# ADDR 

_aB A_ 

STA# ADDR 


0030 00026 03300112 STA# ADDR 

- 0031 00027 1410011 ? LMS_ A DDR 

0032 00030 56100000 IMS *NSWO 

_.00331-00031 56100000_LMS_&M&HO 

0034 00032 11100020 BRU TW0 

0036 00034 12100042 0NE SPB [NPT 


0038 00036 14100112 

0039 00037 56100000 


IMS ADDR 
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-- -4.. .A003.~~.-.-. 4,-P-,.G0DF-R&Y SATAtfiW N0-,-. -320002 A 

0040 00040 11100034 BRU ?NF RET ANOTHER CHARACTER 

-. 004 j 00041 - 11,3 00 000_B&i-U-gaa t_SE_T. URN.. 


ii 


004? 

00042 

oooooooo 

In p T «*• *• 

subroutine t« ret next charactfr 

- ■ --0043- 

-000-43 

-001703Q4- 

-A-LB_ L^i _ 



0044 00044 02077767 LBA «-9 

4&4S 00 0 4 S 04 100111 -S4X CXXf. 


0046 

00046 

02000000 


LBA 

*0 



__0047 

00Q47 

15006000 


CMA 

s * 6000 

TEST 

CiAQ ftllCSTTtfM MARK 

0048 

00050 

11100052 


BRu 

*♦2 

N0 


_0049 

norm 

11.1001 07 


8RU 


VfS 


0050 

00052 

15001000 


CMA 

*'001000 

TEST 

F0R ZERO 

_ rm*l 

000^3 

V1100058 


RRii _ 

* + ? 

Mf4 


005? 

00054 

11100106 


BRU 

AMBl 

YES 


_.0083 

00055 

15003000 


CMA 

s'3000 



0054 

00056 

11100060 


BRU 

*♦2 

N0 


_Q05iL_ 

00057 

11 100105 


. RRU 

AHB4 



0056 

00060 

0000002? 


SAZ 


TEST 

FRR SPACE 

0087 

00061 

11100064 


__HRU 

#4-3 

M0 


0058 

00062 

02000020 


LBA 

s'?0 



0059 

00063 

11100107 


BRU 

STB 



0060 

sr 

30 

o 

o 

o 

00000416 


LSL 

4 



0061 

00065 

00000024 


SAP 


TEST 

FAR 1? p ilNCH 

0062 

00066 

16000060 


A MB 

5 * 60 



0063 

00067 

nnnoni 16 


i SL 

1 



0064 

0007b 

00000024 


SAP 


TEST 

FflR 11 PUNCH 

0065 

00071 16000040 


AMB 

s' 4jl_ 



0066 

00072 

00000116 


LSL 

1 



0067 

__DQQ73l 

00000024 


SAP 


TEST 

FOR 0 PUNCH 

0068 

00074 

16000020 


aMB 

= •20 



0069 

nn 07H 

nnnnni 

1 St 

l„SL 

1 



0070 

00076 

00000023 


SAN 


TEST 

FOR NEXT R 0 W PUNCH 

0071 

00077 

iiiooto? 


«RU 

TMS 

M0_ 


0072 

5oioo 

16000012 


amb 

*'12 

adjust total for punch 

0073 

00101 

16100111 


A M 8 

FqNT 



0074 

00102 

14100111 

IMS 

IMS 

FONT 



... - 0075 

00103 

11100075 


RRU 

l SI. 

N 0 


0076 

00104 

11100107 


BRU 

STB 

YES 


0077 

00106 

16000040 

A HR 4 

AMB 

_ *' 40 



0078 

00106 

1600001? 

AMR1 

AM 8 

*' 12 
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0079 

00107 

2UOJ-...... 

5S10Q000 

STS 

-Sfci_ 

call SCOTIA 

_ QQQrt 

nni. to 

t1300049 


HRli* TMPJ 

0081 

QQ8? 

00111 
. 0011? 

00000001 

0000000? 

fcmt 

AnnR 

ass i 

RSS 1 

0083 

00113 

ORDt 

70400000 

nnofin 


END 


Trt? 

. CJNC 

00020 

00034 




INPT 

0004? 




_ t si 

0007*5 




I MS 
AMS 4 

0010? 
_noiiis.. 




MB1 
_£ Tfl 

00106 
_npiQ7 




FONT 

ADHa 

00111 
no? i ? 



ERRORS 0000 

00000 

















